home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2008 February / PCWFEB08.iso / Software / Resources / Utilities / ReNamer 4.10 / ReNamer.exe / {app} / Scripts / Index filenames.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  2006-04-28  |  76 b   |  7 lines
  1. var
  2.   I: Integer;
  3.  
  4. begin
  5.   I := I + 1;
  6.   FileName := IntToStr(I);
  7. end.